home *** CD-ROM | disk | FTP | other *** search
- /* Fiber Border */
-
- options results
- parse ARG Port b
-
- ADDRESS value Port
-
- pp_Progresstext 'Border'
-
- pp_GetWidth
- W=result
- pp_GetHeight
- H=result
- pp_ClosestColor 255 255 255
- White=result
- pp_ClosestColor 0 0 0
- Black=result
-
- pp_StencilOff
- pp_EffectOff
- pp_SpareOnOff
- pp_ComposeReqOff
- pp_Compose 0 100 0
- pp_SetApen Black
- pp_SetBpen White
- pp_Cls
-
- Tot=7
-
- pp_EffectOn
- pp_Progress 1 Tot
- pp_Displace 40
- pp_BoxF 0 0 W-1 H-1
- pp_Progress 2 Tot
- pp_Displace 40
- pp_BoxF 0 0 W-1 H-1
- pp_Progress 3 Tot
- pp_GaussianBlur 10
- pp_BoxF 0 0 W-1 H-1
- pp_Progress 4 Tot
- pp_Mosaic 10
- pp_BoxF 0 0 W-1 H-1
- pp_Progress 5 Tot
- pp_Glass 3 52 2 55 0
- pp_BoxF 0 0 W-1 H-1
- pp_EffectOff
- pp_Progress 6 Tot
- pp_SparetoStencil
- pp_InvStencil
-
- EXIT
-